Passer un paramètre à un script PERL

Par exemple, le script test.prl :

#!/usr/bin/perl
# pour un appel du script de la forme : test.prl coucou mon pti\ loup
my ($Argument1, $Argument2, $Argument3) = @ARGV;
print "$Argument1 $Argument2 $Argument3\n";

appelé par la commande :

Mon_ordi:~ moi$ /Users/moi/le...chemin/test.prl  coucou mon pti\ loup

où Mon_ordi est le nom donné à l'ordinateur, moi le nom de l'utilisateur de la session courante, et /Users/moi/le...chemin/test.prl constitue le chemin absolu pour atteindre le script, affichera sur une nouvelle ligne :

coucou mon pti loup
Mon_ordi:~ moi$ 

la dernière ligne du cadre ci-dessus présentant l'invitation pour une nouvelle commande. Dans ce code,

• my() est une fonction qui permet d'initialiser plusieurs variables à la suite,
• $ suivi d'un chaine définit une variable dont les nom est formé par cette chaine,
• et @ARGV est la liste des paramètres récupérés par le système.

Dans l'appel, pour que le dernier blanc ne soit pas considéré comme un séparateur de paramètres, on le fait précéder d'un antislash ( \ ) : pti\ loup est un seul paramètre.